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The Sinclair Louisville User Group meeting came to order on 
Sunday, October 11, 1987 at 2:00 PM at the Government Center on 


Outer Loop road. 


If you have articles or programs that you wish to be included 
in the newsletter, please give them to Shawn Merrick. He will 
then edit them and pass them on to our publisher, Jim Dodrill. 
This is the way to submit articles or programs for publication 
in SLUG. Don’t be a lurker, get your name in print! 


Speaking of the newsletter, you can’t help but notice the 
multicolored pages. Jim Dodrill thought it would "brighten" 
things up a bit, so there they are. By the way, Jim says he IS 
NOT colorblind, he just wanted to be as colorful as the trees 
are (or were). We need to set a meeting for his LARKEN disc 
system demo. He should be well familiar with its operation by 
now. 


The ADAM made its debut"* at our last meeting. Shawn Merrick 
brought his system in and treated us to a demo af ADAMCALC, a 
spreadsheet pgm, and a database program that is similar to 
PRO/FILE on the 2068. I can’t remember the name of the database 
program, but it does a nice job of sorting and listing 
information. Also demoed was a game package. Shawn gave us some 
news of the BRS program he has written, and selling, for the 
ADAM machine. From the messages I’ve seen on Compuserve about 
Shawns BBS, it will be the super fast program with xmodem 
transfer that the ADAMites have been waiting for. Nice stuff, 
Shawn! Now for the phone line....... 


SLETTER 


For those of you who are planning to attend the T/S WINTERFEST 
in Florida, there is information on entrance faes . and 
pre-registration inside this issue of newsletter. Dates are 
March 4-6, 1988, so make your plans now, and give yourself an 
after Christmas gift in March. 


After Shawns demo, the meeting was officially ajourned at 3:45 
PM. Start a New Years resolution early and come to the meeting 
next month on Sunday, December 13, 1987. It will be the last 
chance to see Aube this year. 


Bob Crecco, Secretary 
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THE LATEST INFORMATION FROM THE SUNSTATE BBS ...... 
C-T/S WINTERFEST NEWS 


SUNSTATE Timex/Sinclair WINTERFEST °88 will be held on March 
4-6, 1988 in sunny Orlando Fl. The Orlando Marriott Hotel will 
be the host hotel. Advanced reservations are now being accepted, 
both for entry to the WINTERFEST and vendor’s booths. Prepaid 
entrance will be $5 single, $9 family, at the door $8 single, 
$12 family. SEE Message #2 for details on how to register. 


Message # oO002 
September 1,1987 
To: ALL 
From: Old Man Time 
Re: Winterfest registration 


To pre-register for the WINTER FEST: Mail your name(s), Address, 
phone #, proper fee ($3 single,$9 family), TO: 


SUNSTATE T/S WINTERFEST 
249 North Harden Ave. 
Orange City, Fl 32763 
Mke checks payable to: 
Northeast Florida T/S Users 
Group (NEF T/S Users GRoup) 


WE are using their checking account as they are one of the four 
host groups. 


ARLO AND JANIS ® by Jimmy Johnson 


USTEN MY CHILDREN, OF A MODERN-DAY HERO HE RUNS THROUGH THE SCREAMING, “STORE YOUR 
AND WO SHALL HEAR, LIKE PAUL REVERE. OFFICE, NOT THROUGH oe ae ASTM 
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Coleco ADAM Review #3 by Shawn Merrick, November 1987 


CP/M 2.2 with Assembler from Coleco Industries and Digital 
Research Incorporated, $25 


cP/M is an operating system for 8080 and 2480 computers. Lt 
allows different brands or models with these CPU's to become 
highly compatible with each other. For example, many public 
domain CP/M programs require little or no changes to run on 
ADAM even though they were written on other computers. 


Unlike CP/M 3.0 (plus) for the Commodore 128, ADAM CP/M 2.2 
includes utilities and programming aids to get you started. 
It has programs for drive status, file copy, text editing 
(ASCII), and an assembler to create machine language 
programs. 


Unfortunately, the assembler (ASM.COM) is limited to 8080 
instructions (which work on Z80's) and can not take 
advantage of special Z80-ONLY operations. Many programmers 
think Z80 mnemonics (text instructions) are easier to 
understand than the 8080 versions; and 280 offers more 
functions. There is a lot you can do with ASM.COM, but you 
probably won't need it after you get a good public domain 
Z80 assembler. 


cP/M allows ADAM to run some superior-quality communication 
programs. MEX (Modem EXecutive) is one of the best. It can 
be programmed with instruction files to dial a number, log 
onto a system, and send or receive information. You can be 
asleep while all this is happening! These terminal programs 
often include the XMODEM file transfer protocal which allows 
error-free exchange of programs and files. XMODEM programs 
under the ADAM operating system are rare. 


An excellent CP/M feature is the RAMDisk. If *you have a 64K 
RAM expander installed, you will have 55K for temporary file 
storage. It is lightning-fast since no mechanical parts are 
involved. ORPHANWARE in Akron, Ohio makes 256 and 512K 
expanders providing the best speed from the biggest tasks. 


cP/M is designed for 80 column systems. The ADAM version 
only displays 30 columns on the screen at a time. You can 
scroll to the other 50 columns, use a screen chop progran, 
or buy an 80 column card and monochrome monitor. 


The BIOS (Basic Input/Output System) is the only part of 
CP/M tailored for ADAM. It tells CP/M how ADAM hardware 
works. While there are a few annoying bugs in the BIOS, 
patches and fixes have been made available by generous ADAM 
programmers. Datapack users will find some problems with 
the FORMAT program and CP/M datapacks are more likely to get 
tangled during read errors. CP/M seems to rely heavily on 
the directory (middle of tape) and is tediously slower than 
ADAM operating system. The disk drives work beautifully and 


are a worthwhile investment if you plan to use CP/M 
frequently. 


The documentation is extensive for beginners, but expert 
programmers may be confused or upset with errors and 
ommisions in technical details. Close to 300 pages are 
divided into various sections in the vinyl binder. 


In spite of the flaws I've mentioned, CP/M offers a lot of 
potential to ADAM users. Any one of the fine public domain 
programs can make it worth the purchase price. 


Next review- SmartFiler 


ADAM Print & Run, written by Shawn Merrick, August 1987 


Here's a program that demonstrates how the ADAM computer can 
do 2 things at one time. When you run this, it will start 
printing the alphabet, and list the program on your screen 
twice during the printout! A machine language call is made 
to the START PRINT routine. This tells the 6801 in the 
printer to print up to 16 characters, and the Z80 continues 
to work (Listing the program on the screen)! It's not 
really useful in itself, but serves as a model for using 
ADAM to it's potential. 


REM Shawn M. Merrick 
REM Print & Run demonstration 


REM Machine Language routine 
DATA 33,17,0,1,16,0,62,2,205,194, 251,201 


FOR gq = O TO il ¢ 

READ p: POKE 3+q, Pp ys 

NEXT q 

REM CR,LF, and some alphabet 

DATA 13,10,65,66,67,68,69, 70,71,72,73,74,75, oe 77.98 


FOR x = O TO 15 
READ p: POKE 17+x, p 
NEXT 

CALL 3 

LIst 

LIst 
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3-D WIRE FRAME GRAPHICS 
By Tim Swenson 


The program Listed abe 
allows) a pesson to idetune 
object, draw it on the sc 
and snoOcacey tein etme om Catt 
planes. 

The heart of the program lies 
in how the object is represented. 
Two arrays hold the information 
for the object. An vertex erray 


Clist holds ali of the vertices, 
An edge array ‘list) holds the 
two endpoints of the edges The 
edgel array refers back to the 
Ven tes seat Lor the actual 
points [It only holds the number 
of the vertex. 
Lines 100 toa 1030 in ‘the 
program holds the definition of a 
epilol= and some values for 


variables used by the progran. 
Lock at the diagrams and the the 


two lists to see how the cube is 
defined. Mere complex figures 
will take more information. 

Thee acenterescofe the cube is 
CORORODs: This can be changed by 
th user. The variables XX, YY, 


, 
e e 
and 22 define the center that the 


here are four procedures in 
the program. They are treated as 
keywords To display the object 
the user can type in directly, or 
in a program, ODISPLAYSB. ROTX, 
Reta and ROTZ rotate the object 
in radians held by the variable 
ROT. The program says that ROT 
LS Ones wrong. It should be 
in sradvans. i ikesPh/1 Or Just to 
refresh your memory PI/2 is 90 
degrees. 

When a rotation procedure is 
called the object is spun in the 
axis defined. Since the Z axis 
is pointing out of the screen, 
rotating the object will make it 
appear to spin like it is ona 
turntable and you are looking 
down “on it. Ip bope kbar ois 
clear. 

The variable D2 changes how 


‘GL PROGRAM 


large the Object. is on the. 
screen. The larger the number 
the smaller the object. 

When you run the program as it 


is, nothing appears to happen. 
ADT it) hasvdene, te topeload the 
array with the data and set up 
the variables. Type ROTX, ROTY, 
and then DISPLAY3D. You will now 
see the cube at an angle. 

Have fun with the progran. Le 
you have any questions feel free 
to contact me. tS hard to 


summarize a lot of material ina 
short article. 


VERTICES 


4 6 
VERTEX LIST 
peo oe = > ae or TL ae ae 
Ga 1, =P ets @= 41,415 
S= 414-1) 6= (1,-1,-1) 
T= (-1,-1,-1) SE Mee Go pe ee 
EDGES 


1= (1,2) Papers GCE A re: 
S= ¢€4,3>) 4=" 631 
5= (7,8) 6= ¢8,5) 
7= €5,6) 8= (6,7) 
OSE te Le LO=" 66273) 
P= S245 12= (8,2) 


aby 
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DiM vertex (100, 3) 

DIM edge (200, 2) 

RESTORE 

READ xcenter, ycenter 

READS ai. a2 rot 

220 BEAD =x, yy, 22 

230 READ vertexcount 

240 FOR loop = 1 TQ vertexcount 
250 FOR loop2 = 1 TQ 3 

260 READ vertex (loop, loap2) 
270 NEXT loop2 

230 NEXT loop 

290 READ edgecount 

300 FOR loop = 1 TO edgecount 
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ak vertex (leop, 1) xCOS 
tex (loop, 3)*SINCrat) 
ZAte= vertex (loop, 1)*SIN 
rtex ‘loop, 3) *COS (rot) 
ertex(loop,1> = 

verte ex(loop, 3) 
NEXT loop 
END DEFine roty 
DEFine PROCedure rotx 
FOR loop = 1 TO 
Teseount 
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9260 NEXT loop 

S290 END DEFine rotx 

9300 DEFine FuNction transx 
KGssipiie tal xa te!s) 

9305 LOCal xprime 

9310 xprime = (xx*d2)/dl 

9315 RETurn xprime 

9520 END DEFine transx 

9330 DEFine FuNction transy 
fy. de) 

9335 LOCal yprime 

9340 yprime = Cy*d2)/d1l 

9345 RETurn yprime 

9350 END DEFine transy 

9400 DEFine PROCedure 
display3d 

9405 CLS 

9410 FOR loop = 1 TO edgecount 

9420" SEE Te points = edge (loop, 1) 

S430. LER ipointe edge loop, 2) 


It 


9435 LET x1 = vertex(pointi,1) 
PNG 

9440 LET xi = tCranss (xl al a> 
9445 LET x2 = vertex (point2,1) 
9450 LET x2 = trans (x2; d1,d2> 
9455 LET yi = vertex (pointl, 2) 
eee 

9460 LET yi= transy‘yl1,di,d2> 

9465 LET y2 = vertex point2, 2) 
eas 


9470 LET y2 = transy(y2,d1,da2) 

9480 LINE giretece yitycenter 
TO xEt+xcenter, y2+ycenter 

9499 NEXT loop 

9495 END DEFine display3d 


DONT BE A BONEHEAD 
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HSER 
GROUP 


BEFORE YOU BECOHE EXTINCT 


[yQ PRINT “L.1-S5.T. ing; 
< 3G PRINT "L.I.S.T. ing 
28 PRINT "L.1.8.T. ings. 
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PRINT oe 


GRAPHICS MADE EASY 
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BY CEDRIC R. BASTIAANS 


If you’re like me you have many more books on 


the TS2068 than just the User Manual that came 
with your computer. And maybe you have read 
everything on User Defined Graphics in these 


books. Maybe even given it a try but gave up 
because it was just too much trouble? All those 
binary nuabers to be punched in! Error prone, 
what? 


Well, weep no more, friends. The listing on the 
right is-a program that was inspired by 
' publications of the 2 authors shown in line 1. 
I combined the good things in their programs, 
added instructions and a few lines which aate 
the new program run better and be of more 
help. : 

I submitted a siapler version to LIST, on tape, 
in the fora of a contribution to a MIlibrary 
tape. It'was never included in any of the 
finalized library tapes and I have no idea what 
happened to ay contribution' But here then, 15s 
the complete listing. 


Key 1t in and RUN. You will de greeted by a 
brief explanation; follow the prompt. A square 
is drawn on screen and as you work with it ,ou 
will find that it is an enlarged 8&8 matrix for 
the creation of a PIXEL MAP. Try the number 
keys 1 through 8 and notice how easy it is to 
lay down a black (ink) square or remove it 
again. Notice that when you have moved the 
arrow down, additional text appears which gives 
you instructions how to proceed when you have 
coapleted your pixel map. Ignore it for now and 
make the map shown in FIG. 1. 


129 
es 
35 
et 
et 
36 
$5 
129 
Lis MAS SEEN STORED AS GRAF ATIC A 
FIGURE 1 
Then press ENTER and watz %he computer list 


all the Sit information necessary to record it 
in the computer, tn decita#aal rumters and not in 
Binary’ When presoted for a character to carry 


this UDG, key in the cheracte- "A". You can 
choose any C™aracter between A- U (A and U 
included). 

The computer will get back t9 you with the 


1 REM 442 UDGMAKER #22 
by CEDRIC R. BASTIAANS, inspired 
by JOHN WVENTUORTH (SUN VOL.2 83} 
and BILL POUERS (CATS NEUSLETTER 
MAY 3S) 
1@ PRINT AT 2, 1; ‘THIS PROGRAM 


PRESENTS AN EASY”: AT 3,15" eee 
TO MAKE USER DEFINED” ,AT 4,8,°~ 
RAPHICS (UDG’s)” 

12 PRINT AT 6,80, "THE UDG’s UIL 
LINOT —~BE (LOST sO RTH “NEU re 
EAR", ““SAVE"' OR "““LOAD” “ONLY 


"““RAND USR 8°", RESETTING OR TU 
RNING OFF THE COMPUTER UILL'" 
1S PRINT AT 11,3; "PRESS ANY KE 
Y TO CONTINUE": PAUSE @: CLS 
28 PLOT 95,55: ORAU 65,0: DRALV 
@.65: ORAY -65,8: DRAU @,-55 
3@ POKE 23658,8: DIM AS(3,3) 
LET R=1: FOR L=@ TO 7: POKE USR 
SAS +k sess: [o 

188 PRINT AT R36,10; ">" 

185 PRINT AT 8,1; “USE KEYS 1 TH 
ROUGH 8 TO DARKEN THE APPROPRIAT 
E SQUARE. AGAIN TOCANCEL YOUR CH 
0 


ICE. 
187 PRINT AT 4,8, "MOVE THE ARRO 
U UITH KEYS A AND ee 

110 PAUSE @ LET I$=INKEYS 

120 IF I$>="1" AND Is<="3" 

LET AS(R,VAL I$) =(" “~ AND ASIR, 


VAL I$) =") +00 AND AS(R,VAL TI 
$) =" “): PRINT AT R+6,12, AS (R) 
GO TO 1198 


130 PRINT AT R+6,18:" “- LET R= 
R+(1 AND I$="Z" AND R<8)-(1 ANC 
Ig="A" AND R>1) : 

135 PRINT AT 16,0; "IF YOU ARE 5 
ATISFIED UITH YOUR DESIGN. PRES 
5 <ENTER> AND THE COMPUTER UIL 
L PRINT THE DECIMAL NUMBERS FOR 
“OU TO RECORD FOR EUTURE USE <9 

140 IF COOE I$<013 THEN GO TO lL 
09 


230 CATA 123,64,32.16,8.4.2.1 

eid FOR Jel TO o- L. Ler Sos RES 

FOR R=l TO 9g 

ET L=t+(xX AND AS(U.RI =H NE« 
R PRINT AT J+5, ao . NEXT J 
e203 FRINT AT 16, 


ec2 FRINT AT 15,8.” 
you VANT TO CARRY 
(A-U ONLY!" 


Ue ren Oe 
TRIS NEU CRA 


220 GOR sl 10 Si (Ler <)>" RES 
ORE 200 FOR Ral TO 3 FEA «KL 
ET L=tL4txk ANDO AS(YU.R) = "BD NE «Tt 

R COKE USR BS+u-1.0 NEXT J 

e-0-FLASM 1 (GEEE 2S. 12 SR INS 
AT 19,3,"U0G HAS BEEN STORED Re 
GRAPNIC 

308 PRINT B1,AT 1.0. BOCISy fee 
¥ BNOTRER BRUIT?” PAUSE @ FLASH 

O IF INREY$="M~ THEN FRINT 2_ 
AT 1, 

G3 TO 130 

JOS eEIEOINME ($= (Coie LMEN cue 

385 IF INKEY$="0" THEN 572° 

310 FLASH 8 CLS5 Gonos 

328 SAVE “UOGMARER” LINE 1 


RERKKSKKEKKKTKKKKRKKRKKSERAREAREKKREREKKKKRKEKKKES 
DEFINED 
AS SARASS SESSA ETERS ERE SERS ESSESAE STEER SESE Es 


indication that the UDG has been stored and you 

will be asked to either modify, copy, quit or 

do another UDG. I suggest you press Q and try 

your UDG in actual print by keying in SHIFT 9 

(that’s the GRAPHICS mode) and then "A" (or if UDG HAS BEEN STORED AS 
you chose a different character, key in that _ . . FIGURE @ 


es 
= 


RAFHIC O 


HUSBSeSS 


character). If you keep the key down you’1! see Q 
that this UDG could make a siaple but nice 8 
border. 4 

4] 
NOTE: If, after trial printing your UDG, you oe 
need to modify it, key in GO TO 100 to get the ass 
original pixel map back. After (Ciopy, it will UDG HAS BEEN STORED AS GRAPHIC 
be erased and return you to the start of the ___. __ FIGURE 3 
program. @ 

@ 
Now, if you need this UDG 1n your programa, vse - 
the following program lines (we'll assume that r.) 
you have chosen the character "A" for this UD6 = 
storage): S 


255 
AS GRAPHIC nr 


UDG HAS BEEN STORED 
_. FIGURE 


1 DATA 129,464, 36,24, 24, 36, 56,129 5 See ee 4 


2 RESTORE 1:FOR N=O TO 7: READ DO: POKE USR “A” () 
+N, Dz NEXT N ae 
i) 252 
7 : 2s4 
Each time you use the graphics “A" in yur ais 
program, the large X will be printed. 224 
ead 
UDG’s may be combined to make euch larger UOG HAS Ce cine =" GRAPHIC 5 
graphics. Try the following: eta geesee rime er ee M219 ee: 
a ¥ on 4 3 
Key in the pixel map shown in FIG 23 store "D” 3 
Next, key in the aap shown in FIG 3; store “0” 2 
Then, key in the map shown in FI6 43 store “b~ 3 
Next, key in the aap shown in FIG 5; store "S° = 
Next, key in the aap shown in FIG &3 store “H*° UCG HAS BEEN STORED AS GRAPHIC FR 
Furthermore, the map shown in FIG 73 store "U* : FIGURE 6 
Also, key in the map shown in FIG 83 store "N” oss 
Finally, do the aap shown in FIG 93 store "T" e55 
ess 
When you have finished this, CLS and enter the ee 
following in the direct mode: e 
PRINT AT 7,10;°D" (ENTER) UDG HAS BEEN STORED AS GRAPHIC L 
PRINT AT 7,11;°0" (ENTER) FIGURE 7 
PRINT AT 7,12;°K" (ENTER) POTE: ALL THESE ors) 
PRINT AT 7,13;°S" (ENTER) STRINGS ARE ess 
PRINT AT 9,10;"H" (ENTER? GRAPHIC Soa 
PRINT AT 8,11;°U" (ENTER) CHAPECTERS' ess 
PRINT AT 8,12;°N* (ENTER) ss 
PRINT AT 8,173;°T" (ENTER) 1 
uUCG HAS BEEN STORED AS GAReFric Ss 


FIGURE 3 


When you ¢:d everyth:cg right you will see on 
your screen the realistic figure ct a 
dachshund’ Lite this: 


ped 


He.e fun with this progr am' 
UOG 
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COMLINK I helps you spend more time on-line, less time waiting. 

Now available for your’ Zx-81,.T/S 1000, or T/S 1500, COMLINK I 
contains all the electronics and firmware needed to operate your 
Sinclair as an RS-232 compatible terminal. 

You don't have to load.the software from a cassette as it is 
always ready in COMLINK I's internal memory. 

Features include: Expanded’ character set, Macro keys, Control 
key, Editing cursor, and Auto repeat. 

COMLINK I works with any 300 baud modem or TNC. You can: 


* Use COMLINK I with a TNC on packet radio. 
* Access your company or schcol mainframe computer 
rom home 


x Access on-line bulletin boards and data bases such 
as The Source or CompuServe. 


All operating power is supplied from the Sinclair. Simply plug 
COMLINK I into the expansion port of your Sinclair and connect it to an 
RS-232 compatible modem or TNC. One 'USR' call gets you started! 

Each unit is attractively cased, fully tested and guaranteed, and 
is sent with complete operating instructions. Only $54.95 shipping 
included. 


To order, send check or 
money order to: 


A. Eckhardt ;a94 4 
918 Anna Street) 1, | 
Boalsburg, ‘PA.! 16824) 
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No screen-dump could do justice to this program. This is THE definitive aodea 
tarminal program for the ZX81/TS1000 aad T31500. 


2 Westridge or Byte-Back modems supported. 

. Instantly select 40 column, 60-column, or 80-column character widths. You 
read it right! 80 columns on the ZX81/ TS1000! Upper/lower case, and all 
ASCII symbols, while praserving Sinclair graphics; can even be customized 
to migic IBM or other -graphics sets. 

a 


Two window modes. “Qne-window” mode displays all text on a single large 
screen; “Three-vindow" mode has separate windows for menus/prompts, your 
typed output, and received dapat! Wiadows 2 and 3 are even adjustable, 
just like on the "big guys.” 

= Allows XMODEM up/downloading of ASCII files, Sinclair programs, EVEN SI#- 

CLAIR VARIABLES! Usable with word-processors and similar programe. 


= TS2040 and “big” printers supported, via any of the popular interfaces, 

* Revolutionary modes input roatine allows you to adjust windows, change 
width mode, etc. without losing a single incoming character. 

bd Relocatsable, and useable with 16, 32, or 64K RAM. 

ng Takes only 4K at the top of memory, plus the 8K SCRAM board (or eq.) 

ag Review files in either Sinclair or ASCII mode. 

% Allows local echo to be enabled or disabled. 

*  “Beginner-friendly” while asintaining full flexibility for customizing and 
“hacking.” 

s Redefined, auto-repeating Keyboard works like a true upper/lower-case 
terminal. 

ERE ES A TS TSE IE Ba ES EEE BST ESI LTTE EE TEE BREESE OTT ETE LE OEE SEIS 

Finally, a REAL terminal package for your computer, Comes with a_i very 


comprehensive manual; it even hes a large section on "Useful POKEs”" for 
customizing to your tastes. 


The price is the clincher...ONLY $24.95 I! 
nS 


The Peak of Quality... from SILICON MOUNTAIN COMPUTERS f 
gC-12, Mtn. Stn. Group Box, Nelson BC ViL 5P1, CANADA (604)352-1668 
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